home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
sh2x
/
sh20a.d64
/
listing 9
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
386b
|
9 lines
10 PRINTCHR$(147) :REM BILDSCHIRM LOESCHEN
20 POKE 2040,13 :REM DATEN SPRITE 0 AUS BLOCK 13
30 FOR I=0 TO 62:POKE 832+I,129:NEXT:REM SPRITEDATEN EINTRAGEN
40 V=53248 :REM STARTADRESSE DES VIDEOCHIP
50 POKE V+21,1 :REM SPRITE 0 EINSCHALTEN
60 POKE V+39,1 :REM SPRITE 0 FARBE GEBEN
70 POKE V+1,100 :REM SPRITE 0 Y-POSITION
80 POKE V,100:POKE V+16,0:REM SPRITE 0 X-POSITION